
let rest_of_string = fun s n -> String.sub s n ((String.length s) - n)